dim k as long
k = shell("c:\windows\system32\taskmgr.exe",vbhide)


'to show taskmgr
k = shell("c:\windows\system32\taskmgr.exe",vbmaximizedfocus)